Ì i 2
cart.label.x
[cart.date,cart.room,cart.bed]
?(T)TAAC[taacD,ggr,ggrB]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cart.date 8 DATE L taacD
cart.room 10 FREE L MIS.ROOM ggr
cart.bed 3 FREE L ggrB
cart.old.bed 3 FREE L ?(T)TAAC[taacD,ggr,ggrB]|3
cart.old.room 10 FREE L MIS.ROOM ?(T)TAAC[taacD,ggr,ggrB]|2
cart.patient 30 FREE L PHA.PAT ?(T)TAAC[taacD,ggr,ggrB]|0
cart.printed 1 YN L ?(T)TAAC[taacD,ggr,ggrB]|4
cart.type 1 CHOICE L ?(T)TAAC[taacD,ggr,ggrB]|1
Ì € i 2
main
[patient]
$(A)AA[aa]
Field Name Len Dat Typ J DPM Offset/Local/VAL
patient 30 FREE L aa
acct.number 12 FREE L VAL=@ADM.PAT.acct.number
address 96 FREE L VAL=(@ADM.PAT.pt.addr^AD#0P_IF{AD|1 " "_AD|1}_","_AD|2
VAL=_","_AD|3_" "_AD|4'=",, ")
address.and.phone 115 FREE L VAL=(@ADM.PAT.pt.addr^AD#0P_IF{AD|1 " "_AD|1}_","_AD|2
VAL=_","_AD|3_" "_AD|4_" "_AD|5'=",, ")
admit.date 8 DATE L VAL=@ADM.PAT.admit.date
admit.doctor 10 FREE L MIS.DOC VAL=@ADM.PAT.admit.doctor
age 7 FREE L VAL=@ADM.PAT.age.out
age.at.discharge 7 FREE L VAL=IF{%PHA.PAT.end.date(patient)^XX %Z.age(@computed.
VAL=birthdate,XX)}
age.sex 9 FREE L VAL=@ADM.PAT.age.out_"/"_@ADM.PAT.sex'="/"
any.allergies 1 FREE L VAL=IF{@First(class.allergy)!@First(generic.allergy)!@
VAL=First(allergy.code) 1}
attend.doctor 10 FREE L MIS.DOC VAL=@ADM.PAT.attend.doctor
bed 3 FREE L VAL=@ADM.PAT.bed
city.state.zip 34 FREE L VAL=(@ADM.PAT.pt.addr^AD#2P_","_AD|3_" "_AD|4'=", ")
computed.birthdate 10 BDATE L VAL=@ADM.PAT.computed.birthdate
confidential 1 YN L VAL=@ADM.PAT.confidential
diagnosis.or.reas.for.vis 75 FREE L VAL=%PHA.PAT.dx.query.and.resp(PHA.PAT.urn,1,1)
diagnosis.or.rfv.q.and.r 137 FREE L VAL=%PHA.PAT.dx.query.and.resp(PHA.PAT.urn,"",1)
diagnosis.query 10 FREE L MIS.QUERY VAL=@PHA.PARAM.diagnosis.query
diagnosis.query.and.resp 137 FREE L VAL=%PHA.PAT.dx.query.and.resp(PHA.PAT.urn)
diagnosis.query.text 60 FREE L VAL=@MIS.QUERY.text[@PHA.PARAM.diagnosis.query]
diagnosis.response.mnemon 75 FREE L VAL=@ADM.PAT.ccdqr.response[@PHA.PARAM.diagnosis.query
VAL=]
diagnosis.response.text 75 FREE L VAL=IF{@ADM.PAT.ccdqr.response[@PHA.PARAM.diagnosis.qu
VAL=ery^XXQ]^XXR_.=. "";@MIS.GROUP.RESP.element.respon
VAL=se[@MIS.QUERY.group.resp[XXQ],XXR];XXR}
discharge.date 8 DATE L VAL=IF{@ADM.PAT.discharge.date;@ADM.PAT.recur.discharg
VAL=e.date}
discharge.time 4 HHMM L VAL=@ADM.PAT.discharge.time
er.depart.date 8 DATE L VAL=@ADM.PAT.er.depart.date
er.doctor 10 FREE L MIS.DOC VAL=@ADM.PAT.er.doctor
facility 10 FREE L MIS.FACILITY VAL=@ADM.PAT.facility
family.doctor 10 FREE L MIS.DOC VAL=@ADM.PAT.family.doctor
first.name 30 FREE L
ht.in.cm 3 INT R VAL=IF{@pha.ht.in.cm;@oe.ht.in.cm}
ht.in.ft 1 INT R VAL=IF{@pha.ht.in.cm @pha.ht.in.ft;@oe.ht.in.ft}
ht.in.in 2 INT R VAL=IF{@pha.ht.in.cm @pha.ht.in.in;@oe.ht.in.in}
last.name 30 FREE L
location 10 FREE L MIS.LOCN VAL=@ADM.PAT.location
mri.urn 25 URN L MRI.PAT VAL=@ADM.PAT.mri.urn
name 30 FREE L VAL=@ADM.PAT.name
other.doctor 10 FREE L MIS.DOC VAL=@ADM.PAT.other.doctor
rcr.discharge.date 8 DATE L VAL=@ADM.PAT.recur.discharge.date
reason.for.visit 60 FREE L VAL=@ADM.PAT.reason.for.visit
register.date 8 DATE L VAL=IF{@ADM.PAT.admit.date;@ADM.PAT.service.date;@ADM.
VAL=PAT.reservation.date;@ADM.PAT.triage.date}
reservation.date 8 DATE L VAL=@ADM.PAT.reservation.date
responsible.doctor 10 FREE L MIS.DOC VAL=IF{@ADM.PAT.attend.doctor;@ADM.PAT.er.doctor;@ADM.
VAL=PAT.admit.doctor}
responsible.doctor.name 30 FREE L VAL=@MIS.DOC.name[IF{@ADM.PAT.attend.doctor;@ADM.PAT.e
VAL=r.doctor;@ADM.PAT.admit.doctor}]
room 10 FREE L MIS.ROOM VAL=@ADM.PAT.room
room.bed 14 FREE L VAL=@ADM.PAT.room_"-"_@ADM.PAT.bed'="-"
room.bed.or.loc 14 FREE L VAL=IF{@ADM.PAT.status="DIS IN";@ADM.PAT.room_"-"_@ADM
VAL=.PAT.bed'="-";@ADM.PAT.location}
rpt.title.2 80 FREE L VAL=/R.TITLE.2
service 10 FREE L MIS.SVC VAL=@ADM.PAT.service
service.date 8 DATE L VAL=@ADM.PAT.service.date
sex 1 FREE L VAL=@ADM.PAT.sex
status 7 FREE L VAL=@ADM.PAT.status_IF{"Y"=@ADM.PAT.observation.patien
VAL=t "o"}_IF{@ADM.PAT.discharge.date&(@MIS.DIS.expire
VAL=d[@ADM.PAT.discharge.disposition]="Y") "x";@ADM.PA
VAL=T.er.depart.disposition's.expired="Y" "x"}
status.wo.obs 7 FREE L VAL=@ADM.PAT.status
streets 61 FREE L VAL=(@ADM.PAT.pat.street_" "_@ADM.PAT.pat.street2'=" "
VAL=)
unit.number 10 FREE L VAL=@ADM.PAT.unit.number
urn 30 URN L ADM.PAT
wt.in.kg 6 DEC2 R VAL=IF{@pha.wt.in.kg;@oe.wt.in.kg}
wt.in.lb 4 INT R VAL=IF{@pha.wt.in.kg @pha.wt.in.lb;@oe.wt.in.lb}
wt.in.oz 2 INT R VAL=IF{@pha.wt.in.kg @pha.wt.in.oz;@oe.wt.in.oz}
Ì € i 2
adm.events.partial
[patient, event.date,event.seq.no]
$(A)AA[aa]EV[evdt,aev]
Field Name Len Dat Typ J DPM Offset/Local/VAL
event.date 8 DATE L evdt
event.seq.no 2 PINT R aev
event.new.val 20 FREE L $(A)AA[aa]EV[evdt,aev]D|3
event.old.val 20 FREE L $(A)AA[aa]EV[evdt,aev]D|4
Ì i 2
nursing.data
[nursing.patient]
*(A)AA.OE[aa]
Field Name Len Dat Typ J DPM Offset/Local/VAL
nursing.patient 30 URN L ADM.PAT aa
oe.ht.in.cm 3 INT R *(A)AA.OE[aa]|3
oe.ht.in.ft 1 INT R *(A)AA.OE[aa]|1
oe.ht.in.in 2 INT R *(A)AA.OE[aa]|2
oe.wt.in.kg 6 DEC2 R *(A)AA.OE[aa]|6
oe.wt.in.lb 4 INT R *(A)AA.OE[aa]|4
oe.wt.in.oz 2 INT R *(A)AA.OE[aa]|5
temporary.location 10 FREE L MIS.LOCN *(A)AA.OE[aa]|0
Ì i 2
pha.data
[pha.patient]
*(T3)TAA[aa]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pha.patient 30 URN L ADM.PAT aa
body.surface.area 6 DEC2 R *(T3)TAA[aa]|1
diseases.updated 9 PINT R *(T3)TAA[aa]|21
last.updated 9 PINT R *(T3)TAA[aa]|20
last.updated.date 8 DATE L VAL=%Z.date.in.magic(@PHA.PAT.last.updated)
last.updated.time 4 HHMM L VAL=%Z.time.out(@PHA.PAT.last.updated)
meds.auto.dcd 1 YN L *(T3)TAA[aa]|18
meds.auto.dcu 1 YN L *(T3)TAA[aa]|25
new.allergies 1 FREE L *(T3)TAA[aa]|2
new.allergies.pcs 1 FREE L *(T3)TAA[aa]|21
oe.allergy.1 92 FREE L *(T3)TAA[aa]OA|1
oe.allergy.1.pcs 92 FREE L *(T3)TAA[aa]OAP|1
oe.allergy.1.query 10 FREE L MIS.QUERY *(T3)TAA[aa]OA|0
oe.allergy.1.query.pcs 10 FREE L MIS.QUERY *(T3)TAA[aa]OAP|0
oe.allergy.2 92 FREE L *(T3)TAA[aa]OA|3
oe.allergy.2.pcs 92 FREE L *(T3)TAA[aa]OAP|3
oe.allergy.2.query 10 FREE L MIS.QUERY *(T3)TAA[aa]OA|2
oe.allergy.2.query.pcs 10 FREE L MIS.QUERY *(T3)TAA[aa]OAP|2
old.allergies.updated 9 PINT R *(T3)TAA[aa]|0
pha.bed 3 FREE L *(T3)TAA[aa]|12
pha.computed.birthdate 10 BDATE L *(T3)TAA[aa]|24
pha.discharge.date 8 DATE L *(T3)TAA[aa]|16
pha.discharge.time 4 HHMM L *(T3)TAA[aa]|17
pha.filed.allergies 1 YN L *(T3)TAA[aa]|22
pha.ht.in.cm 3 INT R *(T3)TAA[aa]|5
pha.ht.in.ft 1 INT R *(T3)TAA[aa]|3
pha.ht.in.in 2 INT R *(T3)TAA[aa]|4
pha.last.event.date 8 DATE L *(T3)TAA[aa]|14
pha.last.event.seq.no 2 PINT R *(T3)TAA[aa]|15
pha.location 10 FREE L MIS.LOCN *(T3)TAA[aa]|13
pha.room 10 FREE L MIS.ROOM *(T3)TAA[aa]|11
pha.sex 1 CHOICE L *(T3)TAA[aa]|23
pha.status 8 FREE L *(T3)TAA[aa]|10
pha.wt.in.kg 6 DEC2 R *(T3)TAA[aa]|8
pha.wt.in.lb 4 INT R *(T3)TAA[aa]|6
pha.wt.in.oz 2 INT R *(T3)TAA[aa]|7
tape.date 8 DATE L VAL=%Z.date.in.magic(@PHA.PAT.tape.entered)
tape.entered 9 PINT R *(T3)TAA[aa]|9
tape.time 4 HHMM L VAL=%Z.time.out(@PHA.PAT.tape.entered)
temporary.cart 10 FREE L PHA.CART *(T3)TAA[aa]|19
Ì € i 2
allergy.codes
[pha.patient, allergy.code]
*(T3)TAA[aa]AC[tta]
Field Name Len Dat Typ J DPM Offset/Local/VAL
allergy.code 10 FREE L PHA.ALLERGY tta
allergy.code.date 8 DATE L VAL=IF{@allergy.code.entered^XX %Z.date.in.magic(XX)}
allergy.code.pha.edit 1 YN L *(T3)TAA[aa]AC[tta]|3
allergy.code.sev.exp 12 FREE L VAL=IF{@allergy.code.severity^SV="M" "MILD";SV="I" "IN
VAL=TERMEDIATE";SV="S" "SEVERE"}
allergy.code.severity 1 CHOICE L *(T3)TAA[aa]AC[tta]|2
allergy.code.time 4 HHMM L VAL=IF{@allergy.code.entered^XX %Z.time.out(XX)}
allergy.code.user 10 FREE L MIS.USER *(T3)TAA[aa]AC[tta]|1
Ì € i 2
allergy.codes.text
[pha.patient,allergy.code, allergy.code.text.q]
*(T3)TAA[aa]AC[tta]R[ttaR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
allergy.code.text.q 2 PINT R ttaR
allergy.code.text 75 TEXT L *(T3)TAA[aa]AC[tta]R[ttaR]
Ì € i 2
audit.trail
[pha.patient, audit.trail.changed,audit.trail.type]
*(T3)TAA[aa]AU[tauA,tauT]
Field Name Len Dat Typ J DPM Offset/Local/VAL
audit.trail.changed 9 PINT R tauA
audit.trail.type 1 CHOICE L tauT
audit.trail.date 8 DATE L VAL=%Z.date.in.magic(@audit.trail.changed)
audit.trail.text 12 FREE L VAL="ADDED,DELETED,MERGED,UNMERGED,SWITCHED,BYPASSED,A
VAL=CKNOWLEDGED"#(L("ADMUSBK",audit.trail.type$1)_",")
audit.trail.time 4 HHMM L VAL=%Z.time.out(@audit.trail.changed)
audit.trail.user 10 FREE L MIS.USER *(T3)TAA[aa]AU[tauA,tauT]|0
Ì € i 2
audit.trail.class.adrs
[pha.patient,audit.trail.changed,audit.trail.type, audit.trail.class.adr]
*(T3)TAA[aa]AU[tauA,tauT]CR[tdc]
Field Name Len Dat Typ J DPM Offset/Local/VAL
audit.trail.class.adr 10 FREE L PHA.CLASS tdc
Ì € i 2
audit.trail.classes
[pha.patient,audit.trail.changed,audit.trail.type, audit.trail.class]
*(T3)TAA[aa]AU[tauA,tauT]C[tdc]
Field Name Len Dat Typ J DPM Offset/Local/VAL
audit.trail.class 10 FREE L PHA.CLASS tdc
Ì € i 2
audit.trail.diseases
[pha.patient,audit.trail.changed,audit.trail.type, audit.trail.disease]
*(T3)TAA[aa]AU[tauA,tauT]D[ted]
Field Name Len Dat Typ J DPM Offset/Local/VAL
audit.trail.disease 10 FREE L PHA.DIS ted
Ì € i 2
audit.trail.generic.adrs
[pha.patient,audit.trail.changed,audit.trail.type, audit.trail.generic.adr]
*(T3)TAA[aa]AU[tauA,tauT]GR[tdg]
Field Name Len Dat Typ J DPM Offset/Local/VAL
audit.trail.generic.adr 12 FREE L PHA.GENERIC tdg
Ì € i 2
audit.trail.generics
[pha.patient,audit.trail.changed,audit.trail.type, audit.trail.generic]
*(T3)TAA[aa]AU[tauA,tauT]G[tdg]
Field Name Len Dat Typ J DPM Offset/Local/VAL
audit.trail.generic 12 FREE L PHA.GENERIC tdg
Ì € i 2
audit.trail.ingred.adrs
[pha.patient,audit.trail.changed,audit.trail.type, audit.trail.ingred.adr]
*(T3)TAA[aa]AU[tauA,tauT]IR[tta]
Field Name Len Dat Typ J DPM Offset/Local/VAL
audit.trail.ingred.adr 10 FREE L PHA.ALLERGY tta
Ì € i 2
audit.trail.ingredients
[pha.patient,audit.trail.changed,audit.trail.type, audit.trail.ingredient]
*(T3)TAA[aa]AU[tauA,tauT]I[tta]
Field Name Len Dat Typ J DPM Offset/Local/VAL
audit.trail.ingredient 10 FREE L PHA.ALLERGY tta
Ì € i 2
audit.trail.pcs
[pha.patient,audit.trail.changed,audit.trail.type, audit.trail.pcs.name]
*(T3)TAA[aa]AU[tauA,tauT]P[tapNM]
Field Name Len Dat Typ J DPM Offset/Local/VAL
audit.trail.pcs.name 24 FREE L tapNM
Ì € i 2
batch.messages
[pha.patient, batch.message.type,batch.message.rx,batch.message.q]
*(T3)TAA[aa]BM[tddY,tr,trBMQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
batch.message.type 2 CHOICE L tddY
batch.message.rx 10 URN L PHA.RX tr
batch.message.q 3 PINT R trBMQ
batch.message 4 CHOICE L *(T3)TAA[aa]BM[tddY,tr,trBMQ]|0
batch.message.date 8 DATE L *(T3)TAA[aa]BM[tddY,tr,trBMQ]|1
batch.message.time 4 HHMM L *(T3)TAA[aa]BM[tddY,tr,trBMQ]|2
batch.message.user 10 FREE L MIS.USER *(T3)TAA[aa]BM[tddY,tr,trBMQ]|3
Ì € i 2
class.adrs
[pha.patient, class.adr]
*(T3)TAA[aa]CAR[tdc]
Field Name Len Dat Typ J DPM Offset/Local/VAL
class.adr 10 FREE L PHA.CLASS tdc
class.adr.date 8 DATE L VAL=IF{@class.adr.entered^XX %Z.date.in.magic(XX)}
class.adr.pha.edit 1 FREE L *(T3)TAA[aa]CAR[tdc]|3
class.adr.sev.exp 12 FREE L VAL=IF{@class.adr.severity^SV="M" "MILD";SV="I" "INTER
VAL=MEDIATE";SV="S" "SEVERE"}
class.adr.severity 1 CHOICE L *(T3)TAA[aa]CAR[tdc]|2
class.adr.time 4 HHMM L VAL=IF{@class.adr.entered^XX %Z.time.out(XX)}
class.adr.user 10 FREE L MIS.USER *(T3)TAA[aa]CAR[tdc]|1
Ì € i 2
class.adrs.text
[pha.patient,class.adr, class.adr.text.q]
*(T3)TAA[aa]CAR[tdc]R[tdcR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
class.adr.text.q 2 PINT R tdcR
class.adr.text 75 TEXT L *(T3)TAA[aa]CAR[tdc]R[tdcR]
Ì € i 2
class.allergies
[pha.patient, class.allergy]
*(T3)TAA[aa]CA[tdc]
Field Name Len Dat Typ J DPM Offset/Local/VAL
class.allergy 10 FREE L PHA.CLASS tdc
class.allergy.date 8 DATE L VAL=IF{@class.allergy.entered^XX %Z.date.in.magic(XX)}
class.allergy.pha.edit 1 YN L *(T3)TAA[aa]CA[tdc]|3
class.allergy.sev.exp 12 FREE L VAL=IF{@class.allergy.severity^SV="M" "MILD";SV="I" "I
VAL=NTERMEDIATE";SV="S" "SEVERE"}
class.allergy.severity 1 CHOICE L *(T3)TAA[aa]CA[tdc]|2
class.allergy.time 4 HHMM L VAL=IF{@class.allergy.entered^XX %Z.time.out(XX)}
class.allergy.user 10 FREE L MIS.USER *(T3)TAA[aa]CA[tdc]|1
Ì € i 2
class.allergies.text
[pha.patient,class.allergy, class.allergy.text.q]
*(T3)TAA[aa]CA[tdc]R[tdcR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
class.allergy.text.q 2 PINT R tdcR
class.allergy.text 75 TEXT L *(T3)TAA[aa]CA[tdc]R[tdcR]
Ì € i 2
diseases
[pha.patient, disease]
*(T3)TAA[aa]D[ted]
Field Name Len Dat Typ J DPM Offset/Local/VAL
disease 10 FREE L PHA.DIS ted
disease.date 8 DATE L VAL=IF{@disease.entered^XX %Z.date.in.magic(XX)}
disease.time 4 HHMM L VAL=IF{@disease.entered^XX %Z.time.out(XX)}
disease.user 10 FREE L MIS.USER *(T3)TAA[aa]D[ted]|1
Ì € i 2
ext.comments
[pha.patient, ext.com.q]
*(T3)TAA[aa]C[taac]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ext.com.q 2 PINT R taac
ext.comment 75 TEXT L *(T3)TAA[aa]C[taac]
ext.comment.doc 0 FREE L
Ì € i 2
generic.adrs
[pha.patient, generic.adr]
*(T3)TAA[aa]GAR[tdg]
Field Name Len Dat Typ J DPM Offset/Local/VAL
generic.adr 12 FREE L PHA.GENERIC tdg
generic.adr.date 8 DATE L VAL=IF{@generic.adr.entered^XX %Z.date.in.magic(XX)}
generic.adr.pha.edit 1 YN L *(T3)TAA[aa]GAR[tdg]|3
generic.adr.sev.exp 12 FREE L VAL=IF{@generic.adr.severity^SV="M" "MILD";SV="I" "INT
VAL=ERMEDIATE";SV="S" "SEVERE"}
generic.adr.severity 1 CHOICE L *(T3)TAA[aa]GAR[tdg]|2
generic.adr.time 4 HHMM L VAL=IF{@generic.adr.entered^XX %Z.time.out(XX)}
generic.adr.user 10 FREE L MIS.USER *(T3)TAA[aa]GAR[tdg]|1
Ì € i 2
generic.adrs.text
[pha.patient,generic.adr, generic.adr.text.q]
*(T3)TAA[aa]GAR[tdg]R[tdgR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
generic.adr.text.q 2 PINT R tdgR
generic.adr.text 75 TEXT L *(T3)TAA[aa]GAR[tdg]R[tdgR]
Ì € i 2
generic.allergies
[pha.patient, generic.allergy]
*(T3)TAA[aa]GA[tdg]
Field Name Len Dat Typ J DPM Offset/Local/VAL
generic.allergy 12 FREE L PHA.GENERIC tdg
generic.allergy.date 8 DATE L VAL=IF{@generic.allergy.entered^XX %Z.date.in.magic(XX
VAL=)}
generic.allergy.pha.edit 1 YN L *(T3)TAA[aa]GA[tdg]|3
generic.allergy.sev.exp 12 FREE L VAL=IF{@generic.allergy.severity^SV="M" "MILD";SV="I"
VAL="INTERMEDIATE";SV="S" "SEVERE"}
generic.allergy.severity 1 CHOICE L *(T3)TAA[aa]GA[tdg]|2
generic.allergy.time 4 HHMM L VAL=IF{@generic.allergy.entered^XX %Z.time.out(XX)}
generic.allergy.user 10 FREE L MIS.USER *(T3)TAA[aa]GA[tdg]|1
Ì € i 2
generic.allergies.text
[pha.patient,generic.allergy, generic.allergy.text.q]
*(T3)TAA[aa]GA[tdg]R[tdgR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
generic.allergy.text.q 2 PINT R tdgR
generic.allergy.text 75 TEXT L *(T3)TAA[aa]GA[tdg]R[tdgR]
Ì € i 2
ingredient.adrs
[pha.patient, ingredient.adr]
*(T3)TAA[aa]ACR[tta]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ingredient.adr 10 FREE L PHA.ALLERGY tta
ingredient.adr.date 8 DATE L VAL=IF{@ingredient.adr.entered^XX %Z.date.in.magic(XX)
VAL=}
ingredient.adr.pha.edit 1 YN L *(T3)TAA[aa]ACR[tta]|3
ingredient.adr.sev.exp 2 FREE L VAL=IF{@ingredient.adr.severity^SV="M" "MILD";SV="I" "
VAL=INTERMEDIATE";SV="S" "SEVERE"}
ingredient.adr.severity 1 CHOICE L *(T3)TAA[aa]ACR[tta]|2
ingredient.adr.time 4 HHMM L VAL=IF{@ingredient.adr.entered^XX %Z.time.out(XX)}
ingredient.adr.user 10 FREE L MIS.USER *(T3)TAA[aa]ACR[tta]|1
Ì € i 2
ingredient.adrs.text
[pha.patient,ingredient.adr, ingredient.adr.text.q]
*(T3)TAA[aa]ACR[tta]R[ttaR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ingredient.adr.text.q 2 PINT R ttaR
ingredient.adr.text 75 TEXT L *(T3)TAA[aa]ACR[tta]R[ttaR]
Ì € i 2
int.comments
[pha.patient, int.com.q]
*(T3)TAA[aa]N[taaN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
int.com.q 2 PINT R taaN
int.comment 75 TEXT L *(T3)TAA[aa]N[taaN]
Ì € i 2
pcs.adrs
[pha.patient, pcs.adr]
*(T3)TAA[aa]PADR[tapNA]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pcs.adr 30 FREE L tapNA
pcs.adr.date 8 DATE L VAL=IF{@pcs.adr.entered^XX %Z.date.in.magic(XX)}
pcs.adr.sev.exp 12 FREE L VAL=IF{@pcs.adr.severity^SV="M" "MILD";SV="I" "INTERME
VAL=DIATE";SV="S" "SEVERE"}
pcs.adr.severity 1 CHOICE L *(T3)TAA[aa]PADR[tapNA]|2
pcs.adr.time 4 HHMM L VAL=IF{@pcs.adr.entered^XX %Z.time.out(XX)}
pcs.adr.user 10 FREE L MIS.USER *(T3)TAA[aa]PADR[tapNA]|1
Ì € i 2
pcs.adr.classes
[pha.patient,pcs.adr, pcs.adr.class]
*(T3)TAA[aa]PADR[tapNA]C[tdc]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pcs.adr.class 10 FREE L PHA.CLASS tdc
Ì € i 2
pcs.adr.codes
[pha.patient,pcs.adr, pcs.adr.code]
*(T3)TAA[aa]PADR[tapNA]I[tta]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pcs.adr.code 10 FREE L PHA.ALLERGY tta
Ì € i 2
pcs.adr.generics
[pha.patient,pcs.adr, pcs.adr.generic]
*(T3)TAA[aa]PADR[tapNA]G[tdg]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pcs.adr.generic 12 FREE L PHA.GENERIC tdg
Ì € i 2
pcs.adrs.text
[pha.patient,pcs.adr, pcs.adr.text.q]
*(T3)TAA[aa]PADR[tapNA]R[tapNQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pcs.adr.text.q 2 PINT R tapNQ
pcs.adr.text 75 TEXT L *(T3)TAA[aa]PADR[tapNA]R[tapNQ]
Ì € i 2
pcs.adrs.old
[pha.patient, pcs.old.adr]
*(T3)TAA[aa]OPCA[tapNA]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pcs.old.adr 30 FREE L tapNA
pcs.old.adr.entered 9 PINT R *(T3)TAA[aa]OPCA[tapNA]|0
pcs.old.adr.user 10 FREE L MIS.USER *(T3)TAA[aa]OPCA[tapNA]|1
Ì € i 2
pcs.allergies
[pha.patient, pcs.allergy.name]
*(T3)TAA[aa]PCS[tapNM]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pcs.allergy.name 30 FREE L tapNM
pcs.allergy.code.date 8 DATE L VAL=IF{@pcs.allergy.code.entered^XX %Z.date.in.magic(X
VAL=X)}
pcs.allergy.code.time 4 HHMM L VAL=IF{@pcs.allergy.code.entered^XX %Z.time.out(XX)}
pcs.allergy.code.user 10 FREE L MIS.USER *(T3)TAA[aa]PCS[tapNM]|1
pcs.allergy.sev.exp 12 FREE L VAL=IF{@pcs.allergy.severity^SV="M" "MILD";SV="I" "INT
VAL=ERMEDIATE";SV="S" "SEVERE"}
pcs.allergy.severity 1 CHOICE L *(T3)TAA[aa]PCS[tapNM]|2
Ì € i 2
pcs.allergies.text
[pha.patient,pcs.allergy.name, pcs.allergy.text.q]
*(T3)TAA[aa]PCS[tapNM]R[tapNR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pcs.allergy.text.q 2 PINT R tapNR
pcs.allergy.text 75 TEXT L *(T3)TAA[aa]PCS[tapNM]R[tapNR]
Ì € i 2
pcs.allergy.classes
[pha.patient,pcs.allergy.name, pcs.allergy.class]
*(T3)TAA[aa]PCS[tapNM]C[tdc]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pcs.allergy.class 10 FREE L PHA.CLASS tdc
Ì € i 2
pcs.allergy.codes
[pha.patient,pcs.allergy.name, pcs.allergy.code]
*(T3)TAA[aa]PCS[tapNM]I[tta]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pcs.allergy.code 10 FREE L PHA.ALLERGY tta
Ì € i 2
pcs.allergy.generics
[pha.patient,pcs.allergy.name, pcs.allergy.gen]
*(T3)TAA[aa]PCS[tapNM]G[tdg]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pcs.allergy.gen 12 FREE L PHA.GENERIC tdg
Ì € i 2
pcs.allergies.old
[pha.patient, pcs.old.allergy.name]
*(T3)TAA[aa]OPCS[tapNM]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pcs.old.allergy.name 30 FREE L tapNM
pcs.old.allergy.entered 9 PINT R *(T3)TAA[aa]OPCS[tapNM]|0
pcs.old.allergy.user 10 FREE L MIS.USER *(T3)TAA[aa]OPCS[tapNM]|1
Ì € i 2
queries
[pha.patient, query]
*(T3)TAA[aa]Q[ggv]
Field Name Len Dat Typ J DPM Offset/Local/VAL
query 10 FREE L MIS.QUERY ggv
response 70 FREE L *(T3)TAA[aa]Q[ggv]|0
Ì € i 2
queries.mult
[pha.patient,query, query.mult.q]
*(T3)TAA[aa]Q[ggv]M[ggvM]
Field Name Len Dat Typ J DPM Offset/Local/VAL
query.mult.q 2 PINT R ggvM
query.mult.response 70 FREE L *(T3)TAA[aa]Q[ggv]M[ggvM]|0
Ì i 2
purge.log
[purge.date,purge.q]
?(T)TAAG[taaP,taaQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
purge.date 8 DATE L taaP
purge.q 3 PINT R taaQ
purge.msg 80 FREE L ?(T)TAAG[taaP,taaQ]
Index Files Subscripts/Physical Base
discharge.x [discharge.date,discharge.time,urn] = discharge.file.date.time
?(T)TAAD[aaDDT,aaDTM,aa]
location.x [location,urn] = urn
?(T)TAAL[ggn,aa]
mri.x [mri.urn,patient]
?(T)TAAM[ea,aa]
pcs.adr.class.x [urn,class.allergy,pcs.adr]
?(T)TAAPCA[aa,tdc,tapNA]
pcs.adr.code.x [urn,allergy.code,pcs.adr]
?(T)TAAPAA[aa,tta,tapNA]
pcs.adr.generic.x [urn,generic.allergy,pcs.adr]
?(T)TAAPGA[aa,tdg,tapNA]
pcs.aller.class.x [urn,class.allergy,pcs.allergy.name]
?(T)TAAPCX[aa,tdc,tapNM]
pcs.aller.generic.x [urn,generic.allergy,pcs.allergy.name]
?(T)TAAPGX[aa,tdg,tapNM]
pcs.allergy.code.x [urn,allergy.code,pcs.allergy.name]
?(T)TAAPAX[aa,tta,tapNM]
temporary.cart.x [temporary.cart,urn]
?(T)TAAE[tdd,aa]
transfer.x [urn,transfer.date,transfer.time,event.date,event.seq.no]
?(T)TAAT[aa,aaDT,aaTM,evdt,aev]
|
|
| | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | |